;;;;QQ:67762207-
[@YinXiongJiuMei]
{
#if
#act
MOV D1 0
loadvalue D1 "ParamControl\.ini" [Ӣ۾] Ϸ
#say
ӭμӢ۾:\
˻ҪѾҲμ\
Ůϵͳ͵ͼײ㣬\
ʹκξᣬҲߣȴз\
зͼһ㣬һħܽ²\
ڹ涨ʱз뵽ͼͲΪɹɣ\
ŮϷзڹ涨ʱ,\
ҪϺ!\
ɹˣ˫Ի20ֵĽ!\
˻Ҫ100ң\

#if
Equal D1 1
#say
<Ҫʼ....../@StartYinXiongJiuMeiWeManREADY>\\
#elsesay
ԲڲǿϷʱ!\

#if
#say
<뿪/@exit>\

#if
isadmin
#say
==========Gmѡ===============\
<Ӣ۾Ϸ/@GmstartYingXiongJiuMei>\
<Ӣ۾Ϸ/@GmCloseYingXiongJiuMei>\
==========Gmѡ===============\

[@GmstartYingXiongJiuMei]
#act
SAVEVALUE  "ParamControl\.ini" [Ӣ۾¼] Ϸ 1
SAVEVALUE "ParamControl\.ini" [Ӣ۾] Ϸ 0
LineMsg "Grobal" "(*) ע⣬Ӣ۾ѾҵݻԱ"

[@GmCloseYingXiongJiuMei]
#act
SAVEVALUE  "ParamControl\.ini" [Ӣ۾] Ϸ 0
LineMsg "Grobal" "(*) ע⣬Ӣ۾Ѿرգ"
actcmd delfile "envir\ParamControl\Ӣ۾˱.ini"

[@StartYinXiongJiuMeiWeManREADY]
#if
CheckMarriage
Gender [weman]
#elsesay
ԲֻнŮҲܿϷ!\
<뿪/@exit>
#elseact
break

#if
#say
ɰŮ,ȷİѾ׼ô?\\
<ǵ,ȷ!/@StartYinXiongJiuMeiWeMan>\\
<뿪/@exit>\

[@StartYinXiongJiuMeiWeMan]
#IF
checkcmd ISONLINE %USERSPOUSENAME
#act
FormatStr "FLD_CHARACTER='%s'" %USERNAME
ReadValueSql "TBL_SUBHUMAN" %A9 "FLD_SPOUSE" [@CheckSpoNameIfStart]
#elsesay
Ǹ,İĿǰߣڲܲμӴ˻\
<뿪/@exit>
#elseact
break

[@CheckSpoNameIfStart()]
#if
#ACT
MOV A8 %ARG(1)

#if
#act
MOV D1 0
MOV D2 0
loadvalue D1 "ParamControl\Ӣ۾˱.ini" %A8 
MOV A9 %USERNAME
loadvalue D2 "ParamControl\Ӣ۾˱.ini" %A9 

#if
equal D1 1
#say
Բ,ɷѾμӹ˻!\
<뿪/@exit>
#act
break

#if
equal D2 1
#say
Բ,Ѿμӹ˻!\
<뿪/@exit>
#act
break

#if
checkhum $99db02 1
#say
Բ,Ѿ˲μ!\
<뿪/@exit>
#act
break

#if
!checkgold 1000000
#say
Բ,ĽҲ100!\
<뿪/@exit>
#act
break

#if
#act
MOV A9 %USERNAME
SAVEVALUE "ParamControl\.ini" [Ӣ۾]  %A9
SAVEVALUE  "ParamControl\Ӣ۾˱.ini" %A9  1
SAVEVALUE "ParamControl\.ini" [Ӣ۾] Ϸ 0
DelayGoto [Grobal] 360 @gotototo 10009
linemsg [Global] "'<$USERNAME>'Ӣ۾,'<$SPOUESNAME>'ѾʼӪˣ"
actcmd RUNSCRIPTLABEL %USERSPOUSENAME "@_Ӣ۾" 

take  1000000
map $99db02
#SAY
6ʱ俪ʼʱˣɷѾϹӪ!\

[@_Ӣ۾]
#if
#act
TimeRecall 6
map $99db01
sysmsg "ӿӢ۾ֻ6ʱ䣬뾡ɱͨ!"

[@gotototo]
#ACT
MOV A0 "$99db02"
MOV A1 "$99db01"
#if
EQUAL A0 %USERMAP
OR EQUAL A1 %USERMAP
#acT
MAP 1
}

[@YinXiongJieMeiNpcSay]
{
#IF
#ACT
MOV A9 ""
MOV A8 ""
MOV D7 0
loadvalue A9 "ParamControl\.ini" [Ӣ۾] 
loadvalue A8 "ParamControl\.ini" [Ӣ۾] ɷ
loadvalue D7 "ParamControl\.ini" [Ӣ۾] Ϸ
#if
equal D7 1
equal A9 %USERNAME
or equal A8 %USERNAME 
#say
ϲǣǳɹӢ۾!\
<ȡ/@GetYinXiongJiuMeiPrice>
#elsesay
ԲɷûŶ!\
<Ŷõ/@exit>

[@GetYinXiongJiuMeiPrice]
#IF
Gender [weman]
#ACT
GOTO @WeManGivePrice
#ELSEACT
GOTO @ManGivePrice

[@WeManGivePrice]
#IF
#act
actcmd SETUSERJF + 20 Ӣ۾
map 1
LineMsg [Grobal] "'<$USERNAME>'Ӣ۾20ֵĽ!ףճɾ!" 
SAVEVALUE  "ParamControl\.ini" [Ӣ۾]  ""
ClearDelaygoto 10009
close


[@ManGivePrice]
#IF
#ACT
MOV A9 ""
loadvalue A9 "ParamControl\.ini" [Ӣ۾] 

#IF
!equal A9 ""
#say
ʿӦЩ,Ůʿ콱!\
<Ŷõ/@exit>
#act
break

#IF
#act
actcmd SETUSERJF + 20 Ӣ۾
map 1
LineMsg [Grobal] "'<$USERNAME>'Ӣ۾20ֵĽ!ףճɾ! " 
SAVEVALUE  "ParamControl\.ini" [Ӣ۾] ɷ ""
SAVEVALUE  "ParamControl\.ini" [Ӣ۾] Ϸ 0
BreakTimeRecall
close
}
;;;QQ:67762207--------